home *** CD-ROM | disk | FTP | other *** search
/ The Big Mouth 18 / Big_Mouth_The_18_1998_-_Side_B.d64 / platoon music (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  431b  |  15 lines
  1. 1 rem platoon music hack
  2. 10 fora=49152 to 49190:readb:poke a,b:next
  3. 20 print"choose the tune you want by pressing    1, 2 or 3 now!"
  4. 21 get a$:if a$="1" then poke 49158,0
  5. 22 if a$="2" then poke 49158,10
  6. 23 if a$="3" then poke 49158,20
  7. 24 if a$<>"1" and a$<>"2" and a$<>"3" then 21
  8. 25 sys 49152
  9. 30 :
  10. 31 data 120,169,53,133,1,160,0,32,15,226
  11. 32 data 173,18,208,201,100,208,249,238
  12. 33 data 32,208,32,149,227,169,1,141,32
  13. 34 data 208,206,32,208,169,15,141,24
  14. 35 data 212,76,10,192
  15.